﻿Public Class Est_Ordenes_X_Producto
    Dim acceso As New acceso
    Private Sub Est_Ordenes_X_Producto_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        calculo_estadisticas()
    End Sub
    Private Sub calculo_estadisticas()
        Dim sql As String

        sql = "Select * from Vista_Est_Ordenes_X_Producto"
        Est_Ordenes_X_ProveedorBindingSource.DataSource = acceso.ejecutar(sql)
        ReportViewer1.RefreshReport()


    End Sub
End Class